home *** CD-ROM | disk | FTP | other *** search
/ Gold Medal Software 3 / Gold Medal Software - Volume 3 (Gold Medal) (1994).iso / bbsutils / bgfax120.arj / SOURCE.ARJ / FAXATREE.PAS next >
Pascal/Delphi Source File  |  1994-03-23  |  2KB  |  33 lines

  1. { this file is used for CREATING fax images }
  2.  
  3. const
  4.   whitea : array[0..104] of array[0..1] of word = (
  5.     (8,172),(6,56),(4,14),(4,1),(4,13),(4,3),(4,7),(4,15),(5,25),(5,5),(5,28),
  6.     (5,2),(6,4),(6,48),(6,11),(6,43),(6,21),(6,53),(7,114),(7,24),(7,8),
  7.     (7,116),(7,96),(7,16),(7,10),(7,106),(7,100),(7,18),(7,12),(8,64),(8,192),
  8.     (8,88),(8,216),(8,72),(8,200),(8,40),(8,168),(8,104),(8,232),(8,20),
  9.     (8,148),(8,84),(8,212),(8,52),(8,180),(8,32),(8,160),(8,80),(8,208),(8,74),
  10.     (8,202),(8,42),(8,170),(8,36),(8,164),(8,26),(8,154),(8,90),(8,218),(8,82),
  11.     (8,210),(8,76),(8,204),(8,44),(5,27),(5,9),(6,58),(7,118),(8,108),(8,236),
  12.     (8,38),(8,166),(8,22),(8,230),(9,102),(9,358),(9,150),(9,406),(9,86),
  13.     (9,342),(9,214),(9,470),(9,54),(9,310),(9,182),(9,438),(9,50),(9,306),
  14.     (9,178),(6,6),(9,434),(11,128),(11,384),(11,1408),(12,1152),(12,3200),
  15.     (12,640),(12,2688),(12,1664),(12,3712),(12,896),(12,2944),(12,1920),
  16.     (12,3968),(12,2048));
  17.   blacka : array[0..104] of array[0..1] of word = (
  18.     (10,944),(3,2),(2,3),(2,1),(3,6),(4,12),(4,4),(5,24),(6,40),(6,8),(7,16),
  19.     (7,80),(7,112),(8,32),(8,224),(9,48),(10,928),(10,96),(10,64),(11,1840),
  20.     (11,176),(11,432),(11,1888),(11,160),(11,1856),(11,192),(12,1328),
  21.     (12,3376),(12,816),(12,2864),(12,352),(12,2400),(12,1376),(12,3424),
  22.     (12,1200),(12,3248),(12,688),(12,2736),(12,1712),(12,3760),(12,864),
  23.     (12,2912),(12,1456),(12,3504),(12,672),(12,2720),(12,1696),(12,3744),
  24.     (12,608),(12,2656),(12,1184),(12,3232),(12,576),(12,3776),(12,448),
  25.     (12,3648),(12,320),(12,416),(12,2464),(12,3392),(12,832),(12,1440),
  26.     (12,1632),(12,3680),(10,960),(12,304),(12,2352),(12,3488),(12,3264),
  27.     (12,704),(12,2752),(13,1728),(13,5824),(13,2624),(13,6720),(13,1600),
  28.     (13,5696),(13,2496),(13,6592),(13,1472),(13,5568),(13,3520),(13,7616),
  29.     (13,2368),(13,6464),(13,1344),(13,5440),(13,2880),(13,6976),(13,1216),
  30.     (13,5312),(11,128),(11,384),(11,1408),(12,1152),(12,3200),(12,640),
  31.     (12,2688),(12,1664),(12,3712),(12,896),(12,2944),(12,1920),(12,3968),
  32.     (12,2048));
  33.